/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_2 / issue_06 / newworld

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 10 f4 20 3e 20 | 4e 65 77 57 6f 72 6c 64 |..... > |NewWorld|
|00000010| 0d 00 14 05 f4 0d 00 1e | 2a f4 20 2a 2a 2a 2a 2a |........|*. *****|
|00000020| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000030| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0d |********|*******.|
|00000040| 00 28 2a f4 20 2a 2a 20 | 20 20 20 20 20 57 72 69 |.(*. ** |     Wri|
|00000050| 74 74 65 6e 20 42 79 20 | 52 6f 62 20 44 61 76 69 |tten By |Rob Davi|
|00000060| 73 6f 6e 20 20 20 20 2a | 2a 0d 00 32 2a f4 20 2a |son    *|*..2*. *|
|00000070| 2a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |*       |        |
|00000080| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000090| 20 2a 2a 0d 00 3c 2a f4 | 20 2a 2a 2a 2a 2a 2a 2a | **..<*.| *******|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0d 00 46 |********|*****..F|
|000000c0| 05 f4 0d 00 50 14 6f 6e | 65 5f 65 71 75 61 6c 73 |....P.on|e_equals|
|000000d0| 5f 6f 6e 65 3d b9 0d 00 | 5a 0e 70 69 67 73 5f 66 |_one=...|Z.pigs_f|
|000000e0| 6c 79 3d a3 0d 00 64 09 | eb 31 33 3a 87 0d 00 6e |ly=...d.|.13:...n|
|000000f0| 26 fb 20 31 32 3a f1 8a | 31 32 2c 31 29 3b 22 5a |&. 12:..|12,1);"Z|
|00000100| 41 52 43 48 20 53 45 4c | 45 43 54 49 4f 4e 22 3a |ARCH SEL|ECTION":|
|00000110| fb 36 32 0d 00 78 05 f1 | 0d 00 82 17 f1 22 31 2e |.62..x..|....."1.|
|00000120| 2e 2e 4e 6f 72 6d 61 6c | 20 5a 61 72 63 68 22 0d |..Normal| Zarch".|
|00000130| 00 8c 1b f1 22 32 2e 2e | 2e 56 65 72 79 20 48 69 |...."2..|.Very Hi|
|00000140| 6c 6c 79 20 5a 61 72 63 | 68 22 0d 00 96 1d f1 22 |lly Zarc|h"....."|
|00000150| 33 2e 2e 2e 4d 65 64 69 | 75 6d 20 48 69 6c 6c 79 |3...Medi|um Hilly|
|00000160| 20 5a 61 72 63 68 22 0d | 00 a0 1f f1 22 34 2e 2e | Zarch".|...."4..|
|00000170| 2e 53 6c 69 67 68 74 6c | 79 20 48 69 6c 6c 79 20 |.Slightl|y Hilly |
|00000180| 5a 61 72 63 68 22 0d 00 | aa 22 f1 22 35 2e 2e 2e |Zarch"..|."."5...|
|00000190| 41 6c 74 65 72 6e 61 74 | 69 76 65 20 6c 61 6e 64 |Alternat|ive land|
|000001a0| 73 63 61 70 65 20 31 22 | 0d 00 b4 22 f1 22 36 2e |scape 1"|..."."6.|
|000001b0| 2e 2e 41 6c 74 65 72 6e | 61 74 69 76 65 20 6c 61 |..Altern|ative la|
|000001c0| 6e 64 73 63 61 70 65 20 | 32 22 0d 00 be 1a f1 22 |ndscape |2"....."|
|000001d0| 37 2e 2e 2e 46 6c 61 74 | 20 4c 61 6e 64 20 5a 61 |7...Flat| Land Za|
|000001e0| 72 63 68 22 0d 00 c8 14 | f1 22 38 2e 2e 2e 53 65 |rch"....|."8...Se|
|000001f0| 61 20 5a 61 72 63 68 22 | 0d 00 d2 20 f1 22 39 2e |a Zarch"|... ."9.|
|00000200| 2e 2e 43 68 6f 6f 73 65 | 20 59 6f 75 72 20 4f 77 |..Choose| Your Ow|
|00000210| 6e 20 5a 61 72 63 68 22 | 0d 00 dc 06 f1 27 0d 00 |n Zarch"|.....'..|
|00000220| e6 18 fb 37 3a f1 22 43 | 48 4f 49 43 45 20 28 31 |...7:."C|HOICE (1|
|00000230| 2d 39 29 3a 22 3b 0d 00 | f0 10 f5 3a 47 24 3d be |-9):";..|...:G$=.|
|00000240| 3a f1 3b 47 24 3b 0d 00 | fa 2b e7 a7 22 31 32 33 |:.;G$;..|.+.."123|
|00000250| 34 35 36 37 38 39 22 2c | 47 24 29 3d a3 20 8c 20 |456789",|G$)=. . |
|00000260| ef 31 32 38 2c 37 3a fd | 20 70 69 67 73 5f 66 6c |.128,7:.| pigs_fl|
|00000270| 79 0d 01 04 14 fd 20 6f | 6e 65 5f 65 71 75 61 6c |y..... o|ne_equal|
|00000280| 73 5f 6f 6e 65 0d 01 0e | 05 3a 0d 01 18 15 e7 20 |s_one...|.:..... |
|00000290| 47 24 3d 22 31 22 20 8c | 20 e5 20 8d 64 74 41 0d |G$="1" .| . .dtA.|
|000002a0| 01 22 34 e7 47 24 3d 22 | 32 22 20 8c 20 f2 70 6f |."4.G$="|2" . .po|
|000002b0| 6b 65 28 26 30 30 2c 26 | 30 33 2c 26 43 30 2c 26 |ke(&00,&|03,&C0,&|
|000002c0| 45 30 2c 26 35 32 2c 26 | 30 36 2c 26 36 30 2c 26 |E0,&52,&|06,&60,&|
|000002d0| 45 32 29 0d 01 2c 34 e7 | 47 24 3d 22 33 22 20 8c |E2)..,4.|G$="3" .|
|000002e0| 20 f2 70 6f 6b 65 28 26 | 30 30 2c 26 30 32 2c 26 | .poke(&|00,&02,&|
|000002f0| 43 30 2c 26 45 30 2c 26 | 35 32 2c 26 30 36 2c 26 |C0,&E0,&|52,&06,&|
|00000300| 36 30 2c 26 45 32 29 0d | 01 36 34 e7 47 24 3d 22 |60,&E2).|.64.G$="|
|00000310| 34 22 20 8c 20 f2 70 6f | 6b 65 28 26 30 30 2c 26 |4" . .po|ke(&00,&|
|00000320| 30 31 2c 26 43 30 2c 26 | 45 30 2c 26 35 32 2c 26 |01,&C0,&|E0,&52,&|
|00000330| 30 36 2c 26 36 30 2c 26 | 45 32 29 0d 01 40 34 e7 |06,&60,&|E2)..@4.|
|00000340| 47 24 3d 22 35 22 20 8c | 20 f2 70 6f 6b 65 28 26 |G$="5" .| .poke(&|
|00000350| 30 30 2c 26 30 31 2c 26 | 43 30 2c 26 45 30 2c 26 |00,&01,&|C0,&E0,&|
|00000360| 30 35 2c 26 30 36 2c 26 | 36 30 2c 26 45 32 29 0d |05,&06,&|60,&E2).|
|00000370| 01 4a 34 e7 47 24 3d 22 | 36 22 20 8c 20 f2 70 6f |.J4.G$="|6" . .po|
|00000380| 6b 65 28 26 30 30 2c 26 | 30 31 2c 26 43 30 2c 26 |ke(&00,&|01,&C0,&|
|00000390| 45 31 2c 26 30 37 2c 26 | 30 36 2c 26 36 30 2c 26 |E1,&07,&|06,&60,&|
|000003a0| 45 32 29 0d 01 54 34 e7 | 47 24 3d 22 37 22 20 8c |E2)..T4.|G$="7" .|
|000003b0| 20 f2 70 6f 6b 65 28 26 | 30 30 2c 26 30 30 2c 26 | .poke(&|00,&00,&|
|000003c0| 45 30 2c 26 45 30 2c 26 | 30 32 2c 26 30 37 2c 26 |E0,&E0,&|02,&07,&|
|000003d0| 36 30 2c 26 45 31 29 0d | 01 5e 34 e7 47 24 3d 22 |60,&E1).|.^4.G$="|
|000003e0| 38 22 20 8c 20 f2 70 6f | 6b 65 28 26 30 30 2c 26 |8" . .po|ke(&00,&|
|000003f0| 30 30 2c 26 43 30 2c 26 | 45 31 2c 26 46 46 2c 26 |00,&C0,&|E1,&FF,&|
|00000400| 30 36 2c 26 36 30 2c 26 | 45 32 29 0d 01 68 1a e7 |06,&60,&|E2)..h..|
|00000410| 47 24 3d 22 39 22 20 f2 | 67 65 74 5f 75 73 65 72 |G$="9" .|get_user|
|00000420| 5f 64 61 74 61 0d 01 72 | 05 3a 0d 01 7c 22 f4 20 |_data..r|.:..|". |
|00000430| 6e 6f 77 20 73 65 74 75 | 70 20 74 68 65 20 63 6f |now setu|p the co|
|00000440| 72 72 65 63 74 20 73 6f | 75 6e 64 73 0d 01 86 2e |rrect so|unds....|
|00000450| f4 20 77 69 74 68 20 65 | 72 72 6f 72 20 74 72 61 |. with e|rror tra|
|00000460| 70 70 69 6e 67 20 66 6f | 72 20 75 6e 70 6c 75 67 |pping fo|r unplug|
|00000470| 67 65 64 20 73 6f 75 6e | 64 73 0d 01 90 05 3a 0d |ged soun|ds....:.|
|00000480| 01 9a 0e ee 85 20 e5 28 | 9e 2b 31 30 29 0d 01 a4 |..... .(|.+10)...|
|00000490| 11 2a 52 4d 4b 49 4c 4c | 20 57 41 56 45 2e 0d 01 |.*RMKILL| WAVE...|
|000004a0| ae 13 2a 52 4d 4b 49 4c | 4c 20 53 54 52 49 4e 47 |..*RMKIL|L STRING|
|000004b0| 2e 0d 01 b8 11 2a 52 4d | 4b 49 4c 4c 20 50 45 52 |.....*RM|KILL PER|
|000004c0| 43 2e 0d 01 c2 13 2a 52 | 4d 52 45 49 4e 49 54 20 |C.....*R|MREINIT |
|000004d0| 57 41 56 45 2e 0d 01 cc | 13 2a 52 4d 52 45 49 4e |WAVE....|.*RMREIN|
|000004e0| 49 54 20 50 45 52 43 2e | 0d 01 d6 08 ee 85 20 87 |IT PERC.|...... .|
|000004f0| 0d 01 e0 1b f4 20 53 77 | 69 74 63 68 20 6f 6e 20 |..... Sw|itch on |
|00000500| 56 73 79 6e 63 20 65 76 | 65 6e 74 0d 01 ea 0b d6 |Vsync ev|ent.....|
|00000510| 20 73 74 61 72 74 0d 01 | f4 0c ee 85 20 e5 8d 64 | start..|.... ..d|
|00000520| 7e 41 0d 01 fe 19 f2 72 | 6f 6c 6c 65 6d 3a e6 20 |~A.....r|ollem:. |
|00000530| b3 28 36 32 29 3a d6 72 | 6f 6c 6c 0d 02 08 39 fb |.(62):.r|oll...9.|
|00000540| 20 36 33 3a f1 8a 33 2c | 32 31 29 22 49 6e 73 65 | 63:..3,|21)"Inse|
|00000550| 72 74 20 5a 61 72 63 68 | 20 44 69 73 63 20 41 6e |rt Zarch| Disc An|
|00000560| 64 20 50 72 65 73 73 20 | 53 70 61 63 65 22 3a 2a |d Press |Space":*|
|00000570| 46 58 31 35 0d 02 12 0a | f5 fd a6 2d 39 39 0d 02 |FX15....|...-99..|
|00000580| 1c 0a 2a 4d 4f 55 4e 54 | 0d 02 26 0b 2a 2f 5a 41 |..*MOUNT|..&.*/ZA|
|00000590| 52 43 48 0d 02 30 05 e0 | 0d 02 3a 0c dd f2 72 6f |RCH..0..|..:...ro|
|000005a0| 6c 6c 65 6d 0d 02 44 11 | de 20 64 6f 72 6f 6c 6c |llem..D.|. doroll|
|000005b0| 20 26 32 30 30 0d 02 4e | 11 e3 6f 70 74 3d 30 20 | &200..N|..opt=0 |
|000005c0| b8 20 32 20 88 32 0d 02 | 58 0d 50 25 3d 64 6f 72 |. 2 .2..|X.P%=dor|
|000005d0| 6f 6c 6c 0d 02 62 0c 5b | 4f 50 54 20 6f 70 74 0d |oll..b.[|OPT opt.|
|000005e0| 02 6c 17 2e 72 6f 6c 6c | 69 6d 69 74 20 45 51 55 |.l..roll|imit EQU|
|000005f0| 44 20 26 35 43 30 0d 02 | 76 13 2e 77 69 64 74 68 |D &5C0..|v..width|
|00000600| 20 45 51 55 44 20 36 34 | 30 0d 02 80 1a 2e 69 6e | EQUD 64|0.....in|
|00000610| 69 74 5f 72 6f 6c 6c 20 | 4d 4f 56 20 52 32 2c 23 |it_roll |MOV R2,#|
|00000620| 35 31 32 0d 02 8a 19 20 | 20 20 20 20 20 4c 44 52 |512.... |     LDR|
|00000630| 20 52 36 2c 72 6f 6c 6c | 69 6d 69 74 0d 02 94 09 | R6,roll|imit....|
|00000640| 2e 6c 6f 6f 70 0d 02 9e | 27 4d 4f 56 20 52 30 2c |.loop...|'MOV R0,|
|00000650| 23 34 3a 4d 4f 56 20 52 | 31 2c 23 36 34 30 3a 53 |#4:MOV R|1,#640:S|
|00000660| 57 49 20 22 4f 53 5f 50 | 6c 6f 74 22 0d 02 a8 1c |WI "OS_P|lot"....|
|00000670| 4d 4f 56 20 52 30 2c 23 | 31 35 37 3a 4c 44 52 20 |MOV R0,#|157:LDR |
|00000680| 52 31 2c 77 69 64 74 68 | 0d 02 b2 11 53 57 49 20 |R1,width|....SWI |
|00000690| 22 4f 53 5f 50 6c 6f 74 | 22 0d 02 bc 1d 41 44 44 |"OS_Plot|"....ADD|
|000006a0| 20 52 31 2c 52 31 2c 23 | 38 3a 53 54 52 20 52 31 | R1,R1,#|8:STR R1|
|000006b0| 2c 77 69 64 74 68 0d 02 | c6 0d 43 4d 50 20 52 31 |,width..|..CMP R1|
|000006c0| 2c 52 36 0d 02 d0 0c 42 | 4c 45 20 6c 6f 6f 70 0d |,R6....B|LE loop.|
|000006d0| 02 da 0e 4d 4f 56 20 50 | 43 2c 52 31 34 0d 02 e4 |...MOV P|C,R14...|
|000006e0| 07 5d 3a ed 0d 02 ee 12 | 72 6f 6c 6c 3d 69 6e 69 |.]:.....|roll=ini|
|000006f0| 74 5f 72 6f 6c 6c 0d 02 | f8 05 e1 0d 03 02 23 dd |t_roll..|......#.|
|00000700| f2 70 6f 6b 65 28 76 30 | 2c 76 31 2c 76 32 2c 76 |.poke(v0|,v1,v2,v|
|00000710| 33 2c 76 34 2c 76 35 2c | 76 36 2c 76 37 29 0d 03 |3,v4,v5,|v6,v7)..|
|00000720| 0c 17 70 63 3d 31 35 3a | 6c 69 6e 6b 3d 31 34 3a |..pc=15:|link=14:|
|00000730| 73 70 3d 31 33 0d 03 16 | 12 e3 20 6f 70 74 3d 30 |sp=13...|.. opt=0|
|00000740| 20 b8 20 32 20 88 32 0d | 03 20 0c 50 25 3d 26 37 | . 2 .2.|. .P%=&7|
|00000750| 45 30 30 0d 03 2a 0c 5b | 4f 50 54 20 6f 70 74 0d |E00..*.[|OPT opt.|
|00000760| 03 34 0a 2e 73 74 61 72 | 74 0d 03 3e 09 2e 69 6e |.4..star|t..>..in|
|00000770| 69 74 0d 03 48 16 53 54 | 4d 46 44 20 28 73 70 29 |it..H.ST|MFD (sp)|
|00000780| 21 2c 7b 6c 69 6e 6b 7d | 0d 03 52 29 4d 4f 56 20 |!,{link}|..R)MOV |
|00000790| 52 30 2c 23 26 30 45 3a | 4d 4f 56 20 52 31 2c 23 |R0,#&0E:|MOV R1,#|
|000007a0| 26 30 34 3a 53 57 49 20 | 22 4f 53 5f 42 79 74 65 |&04:SWI |"OS_Byte|
|000007b0| 22 0d 03 5c 11 41 44 52 | 20 52 31 2c 70 6f 6b 65 |"..\.ADR| R1,poke|
|000007c0| 69 74 0d 03 66 0f 4d 4f | 56 20 52 30 2c 23 26 31 |it..f.MO|V R0,#&1|
|000007d0| 30 0d 03 70 12 53 57 49 | 20 22 4f 53 5f 43 6c 61 |0..p.SWI| "OS_Cla|
|000007e0| 69 6d 22 0d 03 7a 14 4c | 44 4d 46 44 20 28 73 70 |im"..z.L|DMFD (sp|
|000007f0| 29 21 2c 7b 70 63 7d 0d | 03 84 0b 2e 70 6f 6b 65 |)!,{pc}.|....poke|
|00000800| 69 74 0d 03 8e 22 53 54 | 4d 46 44 20 28 73 70 29 |it..."ST|MFD (sp)|
|00000810| 21 2c 7b 52 30 2c 52 31 | 2c 52 32 2c 52 33 2c 6c |!,{R0,R1|,R2,R3,l|
|00000820| 69 6e 6b 7d 0d 03 98 0f | 4c 44 52 20 52 30 2c 64 |ink}....|LDR R0,d|
|00000830| 61 74 61 0d 03 a2 10 4c | 44 52 20 52 31 2c 64 61 |ata....L|DR R1,da|
|00000840| 74 61 32 0d 03 ac 1b 4c | 44 52 20 52 32 2c 61 64 |ta2....L|DR R2,ad|
|00000850| 72 31 3a 4c 44 52 20 52 | 33 2c 61 64 72 32 0d 03 |r1:LDR R|3,adr2..|
|00000860| b6 0f 53 54 52 20 52 30 | 2c 5b 52 32 5d 0d 03 c0 |..STR R0|,[R2]...|
|00000870| 0f 53 54 52 20 52 31 2c | 5b 52 33 5d 0d 03 ca 20 |.STR R1,|[R3]... |
|00000880| 6c 64 6d 66 64 20 28 73 | 70 29 21 2c 7b 52 30 2c |ldmfd (s|p)!,{R0,|
|00000890| 52 31 2c 52 32 2c 52 33 | 2c 70 63 7d 0d 03 d4 14 |R1,R2,R3|,pc}....|
|000008a0| 2e 64 61 74 61 3a 45 51 | 55 44 20 26 30 30 30 30 |.data:EQ|UD &0000|
|000008b0| 0d 03 de 15 2e 64 61 74 | 61 32 3a 45 51 55 44 20 |.....dat|a2:EQUD |
|000008c0| 26 30 30 30 30 0d 03 e8 | 14 2e 61 64 72 31 20 45 |&0000...|..adr1 E|
|000008d0| 51 55 44 20 26 41 33 34 | 30 0d 03 f2 14 2e 61 64 |QUD &A34|0.....ad|
|000008e0| 72 32 20 45 51 55 44 20 | 26 41 33 34 34 0d 03 fc |r2 EQUD |&A344...|
|000008f0| 0a 45 51 55 42 20 30 0d | 04 06 09 41 4c 49 47 4e |.EQUB 0.|...ALIGN|
|00000900| 0d 04 10 08 2e 65 6e 64 | 0d 04 1a 05 5d 0d 04 24 |.....end|....]..$|
|00000910| 05 ed 0d 04 2e 2a 3f 64 | 61 74 61 3d 76 30 3a 64 |.....*?d|ata=v0:d|
|00000920| 61 74 61 3f 31 3d 76 31 | 3a 64 61 74 61 3f 32 3d |ata?1=v1|:data?2=|
|00000930| 76 32 3a 64 61 74 61 3f | 33 3d 76 33 0d 04 38 2b |v2:data?|3=v3..8+|
|00000940| 64 61 74 61 3f 34 3d 76 | 34 3a 64 61 74 61 3f 35 |data?4=v|4:data?5|
|00000950| 3d 76 35 3a 64 61 74 61 | 3f 36 3d 76 36 3a 64 61 |=v5:data|?6=v6:da|
|00000960| 74 61 3f 37 3d 76 37 0d | 04 42 05 e1 0d 04 4c b0 |ta?7=v7.|.B....L.|
|00000970| dd f2 67 65 74 5f 75 73 | 65 72 5f 64 61 74 61 3a |..get_us|er_data:|
|00000980| fb 32 37 3a f1 27 27 22 | 45 67 2e 20 2d 20 26 30 |.27:.''"|Eg. - &0|
|00000990| 30 2c 26 30 32 2c 26 43 | 30 2c 26 45 32 2c 26 35 |0,&02,&C|0,&E2,&5|
|000009a0| 36 2c 26 30 36 2c 26 36 | 30 2c 26 45 32 22 27 3a |6,&06,&6|0,&E2"':|
|000009b0| fb 35 36 3a e8 27 22 56 | 41 52 20 30 3a 22 56 30 |.56:.'"V|AR 0:"V0|
|000009c0| 24 3a e8 22 56 41 52 20 | 31 3a 22 56 31 24 3a e8 |$:."VAR |1:"V1$:.|
|000009d0| 22 56 41 52 20 32 3a 22 | 56 32 24 3a e8 22 56 41 |"VAR 2:"|V2$:."VA|
|000009e0| 52 20 33 3a 22 56 33 24 | 3a e8 22 56 41 52 20 34 |R 3:"V3$|:."VAR 4|
|000009f0| 3a 22 56 34 24 3a e8 22 | 56 41 52 20 35 3a 22 56 |:"V4$:."|VAR 5:"V|
|00000a00| 35 24 3a e8 22 56 41 52 | 20 36 3a 22 56 36 24 3a |5$:."VAR| 6:"V6$:|
|00000a10| e8 22 56 41 52 20 37 3a | 22 56 37 24 0d 04 56 42 |."VAR 7:|"V7$..VB|
|00000a20| f2 70 6f 6b 65 28 a0 28 | 56 30 24 29 2c a0 28 56 |.poke(.(|V0$),.(V|
|00000a30| 31 24 29 2c a0 28 56 32 | 24 29 2c a0 28 56 33 24 |1$),.(V2|$),.(V3$|
|00000a40| 29 2c a0 28 56 34 24 29 | 2c a0 28 56 35 24 29 2c |),.(V4$)|,.(V5$),|
|00000a50| a0 28 56 36 24 29 2c a0 | 28 56 37 24 29 29 0d 04 |.(V6$),.|(V7$))..|
|00000a60| 60 05 e1 0d ff          |                         |`....   |        |
+--------+-------------------------+-------------------------+--------+--------+